Amiga Format CD 44/Amiga Format CD44 (1999-08-26)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-10].iso/-in_the_mag-/basics/hisoft/const.lha/const/cars_sub.bas

BASIC Source File | 1996-01-25 | 156b | 12 lines

rem $include cars_h

sub cars
    dim shared cars$( 12 )
    q=freefile
    open "cars" for input as q
    for n=0 to 12
        line input#q,cars$(n)
    next
    close q
end sub